home *** CD-ROM | disk | FTP | other *** search
/ .net (French) 1996 November / .net Magazine (FR) - Issue 01 - Nov 1996.iso / mac / Outils / Delete Web Caches < prev   
Text File  |  1996-07-30  |  2KB  |  35 lines
  1. -- Written June 1996 by Buck Donham
  2. -- buckaroo@ilhawaii.net
  3. tell application "Finder"
  4.     activate
  5.     --Empty Netscape Cache
  6.     if (exists folder "Cache ─" of folder "Netscape ─" of folder "Preferences" of folder "System Folder" of startup disk) then
  7.         select folder "Cache ─" of folder "Netscape ─" of folder "Preferences" of folder "System Folder" of startup disk
  8.         delete selection
  9.     end if
  10.     make new folder at folder "Netscape ─" of folder "Preferences" of folder "System Folder" of startup disk
  11.     select item "untitled folder" of folder "Netscape ─" of folder "Preferences" of folder "System Folder" of startup disk
  12.     set name of selection to "Cache ─"
  13.     if (exists file "Global History" of folder "Netscape ─" of folder "Preferences" of folder "System Folder" of startup disk) then
  14.         select file "Global History" of folder "Netscape ─" of folder "Preferences" of folder "System Folder" of startup disk
  15.         delete selection
  16.     end if
  17.     if (exists file "MagicCookie" of folder "Netscape ─" of folder "Preferences" of folder "System Folder" of startup disk) then
  18.         select file "MagicCookie" of folder "Netscape ─" of folder "Preferences" of folder "System Folder" of startup disk
  19.         delete selection
  20.     end if
  21.     --Empty Explorer Cache
  22.     if (exists folder "Cache" of folder "Explorer" of folder "Preferences" of folder "System Folder" of startup disk) then
  23.         select folder "Cache" of folder "Explorer" of folder "Preferences" of folder "System Folder" of startup disk
  24.         delete selection
  25.     end if
  26.     make new folder at folder "Explorer" of folder "Preferences" of folder "System Folder" of startup disk
  27.     select item "untitled folder" of folder "Explorer" of folder "Preferences" of folder "System Folder" of startup disk
  28.     set name of selection to "Cache"
  29.     if (exists file "History.html" of folder "Explorer" of folder "Preferences" of folder "System Folder" of startup disk) then
  30.         select file "History.html" of folder "Explorer" of folder "Preferences" of folder "System Folder" of startup disk
  31.         delete selection
  32.     end if
  33.     empty trash
  34.     beep 2
  35. end tell